﻿Imports System
Imports System.Data
Imports System.Configuration
Imports System.Linq
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.HtmlControls
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Xml '   .Xml.Linq
Imports Oracle.DataAccess.Client


Public Class Conexion
    Dim conn As New OracleConnection()
    Dim oradb As String = "DATA SOURCE=SIEEQ.WORLD;PERSIST SECURITY INFO=True;USER ID=OPS$SIDECOM;PASSWORD=u3gw01o"
    'Public _name As String = "Data Source=prcateg;Persist Security Info=True;User ID=web;Password=web;Unicode=True"

    Public Property OracleConnection() As String
        Get
            Return conn.ConnectionString = oradb
        End Get

        Private Set(ByVal value As String)
            oradb = value
        End Set
    End Property

    Public Sub Casa()
        MessageBox.Show("dsdsdsdsds")
    End Sub

End Class
